home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 23
/
Aminet 23 (1998)(GTI - Schatztruhe)[!][Feb 1998].iso
/
TurboCalc
/
Deutsch
/
TurboCalc installieren
< prev
next >
Wrap
Text File
|
1998-01-15
|
4KB
|
152 lines
; ---------------------------------------------------------------------
;
; $VER: TurboCalc Installer Script 1.95 (29.08.95)
;
; Script to install TurboCalc (english version)
;
; ---------------------------------------------------------------------
(if (<> @language "english")
((if (<> @language "deutsch")
(set @language "english")
)
)
)
; ---------------------------------------------------------------------
;
; STRINGS (German)
;
; ---------------------------------------------------------------------
(if (= @language "deutsch")
(
(set #AskDestDir
(cat "Bitte wählen Sie das Verzeichnis, in dem TurboCalc "
"installiert werden soll. "
"Es wird automatisch ein neues Verzeichnis 'TurboCalc' "
"für das Programm und die Daten angelegt." )
)
(set #AskDestDirHelp
(cat "Für die Installation werden auf dem Ziellaufwerk mindestens "
"1,5 Mbyte freier Speicherplatz benötigt.\n\n"
"Das Installationsprogramm erstellt in dem ausgewählten "
"Pfad ein neues Verzeichnis 'TurboCalc'. Alle Dateien "
"werden in dieses Verzeichnis kopiert.\n\n"
"Sie können nach der Installation dem Verzeichnis natürlich "
"einen anderen Namen geben." )
)
(set #HelpDir
(cat "Hilfe" )
)
(set #InsertDisk2
(cat "Bitte legen Sie die Diskette 2: 'TurboCalcHELP' ein" )
)
(set #InsertDisk2Help
(cat "Das Installationsprogramm kopiert nun die Dateien "
"des Handbuchs und der Onlinehilfe in das Zielverzeichnis" )
)
)
)
; ---------------------------------------------------------------------
;
; STRINGS (English)
;
; ---------------------------------------------------------------------
(if (= @language "english")
(
(set #AskDestDir
(cat "Please choose the destination directory for the TurboCalc "
"software package. "
"A new directory named 'TurboCalc' will be created automatically." )
)
(set #AskDestDirHelp
(cat "To install TurboCalc, you will need at least 1.5 Mbyte "
"on the destination device.\n\n"
"The Installer tool will automatically create a new directory "
"'TurboCalc' in the selected path. All files will be copied to "
"this directory.\n\n"
"if you wish, you can rename the directory after the installation." )
)
(set #HelpDir
(cat "Help" )
)
(set #InsertDisk2
(cat "Please insert now Disk #2: 'TurboCalcHELP'" )
)
(set #InsertDisk2Help
(cat "The Installer tool will now copy the manual and online help "
"files to the selected destination" )
)
)
)
; ---------------------------------------------------------------------
;
; INSTALLATION SCRIPT - BEGIN
;
; ---------------------------------------------------------------------
(set DestDir
(askdir
(prompt #AskDestDir )
(help #AskDestDirHelp )
(default "Work:")
)
)
(set RealDest (tackon DestDir "TurboCalc"))
(set RealDest_Help (tackon RealDest #HelpDir))
(if (= (exists RealDest) 0)
(makedir RealDest (infos))
)
(complete 4)
(copyfiles
(source "AMINET23:TurboCalc/Deutsch/TurboCalc")
(dest RealDest)
(infos) (all)
)
(complete 50)
(copyfiles
(source "AMINET23:TurboCalc/Deutsch")
(dest RealDest_Help)
(pattern "#?.guide#?")
(infos)
)
(complete 80)
(copyfiles
(source "AMINET23:TurboCalc/Deutsch")
(dest RealDest_Help)
(pattern "programmer#?")
(infos)
)
(set @default-dest RealDest)
(complete 100)
; ---------------------------------------------------------------------
;
; INSTALLATION SCRIPT - END
;
; ---------------------------------------------------------------------